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-TITLE COEEDA EEPROM GER LANG LOR 


-REM € 
IDENTIFICATION 


PRODUCT CODE: AC-FF22A-MC 

PRODUCT NAME: COEEDAO EEPROM GER LANG LOR 
PRODUCT DATE: FEBRUARY, 1985 

MAINTAINER: DIAGNOSTIC ENGINEERING 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES NO 
RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS DOCUMENT. 


NO RESPONSIBILITY IS ASSUMED FOR THE USE OR RELIABILITY OF 
SOFTWARE ON EQUIPMENT THAT IS NOT SUPPLIED BY DIGITAL OR ITS 
AFFILIATED COMPANIES. 


COPYRIGHT (C) 1985 BY DIGITAL EQUIPMENT CORPORATION 
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SEQ 0003 
72 
73 i. PROGRAM ABSTRACT 
74 
75 
76 The KDJ11-B is e PDP-11 CPU that incorporates the Jil chip set as the 
77 heart of the processor. It is a quad height Q22 bus module. The 
78 KDJ11-B has two on-board ROM’s. One of them, the 16-bit addressable 
79 ROM, contains the self-test and the boot codes. The other ROM, the 
80 8-bit addressable one, contains the base area with hardware selection 
81 parameters, optional bootstraps, optional UFD (User Friendly 
4 Diagnostic) system desctiption area, and optional foreign language 
text. 
84 
85 On units to be shipped to non-English speaking countries, a dummy or 
86 “null” language is loaded into the EEPROM. The purpose of this is to 
87 disable English language error messages when the system is first 
88 installed. If and when the system passes its internal self tests, 
89 the user will be instructed to run a UFD (User Friendly Diagnostics) 
90 package which will be part of a "country kit” for each seperate 
91 language. The UFD package will use the local language for the 
92 particular country and, in addition, will load diagnostic and error 
93 messages in the local language into the EEPROM, so each subsequent 
94 power-up or reboot will have diagnostic and error messages in the 
=r user's own lanquage. 
6 
97 The purpose of this program is to load the local languaye into the 
98 EEPROM. If it detects an error, the program will attempt to restore 
99 the “old" language, if any and will print a message informing the 
100 user of that fact. 
101 
102 2. SYSTEM REQUIREMENTS 
103 
104 Harcware Requirements 
105 
106 , To run successfully this utility needs: 
107 
108 1. KDJ11-B CPU module 
109 2. console terminal 
110 3. at least 28K of memory 
111 
112 
113 3. LOADING AND STARTING PROCEDURES 
114 
115 To start-up this program: 
116 
117 1. Boot XXDP-+ 
118 
119 2. Type "R NAME”, where NAME is the name of the BIN or BIC 
120 file for this program. 
121 
122 The starting address of the program is 1000. 
123 Note: if trying to restart the program in an arbitrary place after 
124 HALT on Break the following registers should be set up: 
125 17777572=0 to disable memmory management 
126 17777520=1000 to clear diagnostic mode (bit 8), but still save 
127 HALT on Break 
| 128 17777746=400 to flush the cache 
' 
| 
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' SEQ 0004 
Et 4. SPECIAL ENVIRONMENTS 
Be The program is not APT compatible. 
eo 5. PROGRAM OPTIONS 
is? None. 
138 6. EXECUTION TIMES 
139 ; 
tan The program runs in under 20 seconds. 
oat 7. ERROR INFORMATION 
con 7.1 DEFECTIVE BYTE IN EEPROM 
146 After each i i 
re write, the Byte which should have been written is 
compared to the Byte in the proper location, a if it 3 
149 the following error message is dieplayed: ee ieee eae 
aaa EEPROM write error, PCR page n, address mmmmmm. 
i Data written qaqq, date read rrr. 
153 where n is the EEPROM 
, R page selected by the Pa Control Regist 
oo mmmmmm is the physical address of the bad byes it ccaahiaet’ tear ie ana 
ia byte value that was written out to the address and rrr what was read 
157 back in after the write. (should be identical to qaqq) 
oo 7.2 PROCESSOR NOT KDJ11-B 
160 The program checks the t it i i 
“e , e type of CPU it is running on, which must be a 
162 ogee Pod + ngepnae:i5 (MFPT returns 5 in r0). If not, the following message 
4 Language area not supported by this processor. 
is? 7.3 "OLD" BOOT ROM CODE, LANGUAGE AREA NOT SUPPORTED 
168 The program checks to see if i 
p C the ROM code version is 7.0 
gn one gaps me = ons epeere Se Soeeenge area + the cepaon’ 
; i garbage if one was ded. Th i 
+73 following message in that case: . 2 Se, Oe 
+ ? 
By Current Boot ROM version does not support language area. 
175 In addition, the lan 1% i 
° guage bit in the setup area of the EEPROM i 
i‘. cleared, to prevent “garbage” from being printed. ? wisi 
Ba 7.4 CHECKSUM ERROR IN SETUP AREA 
180 The checksum in th i 
e setup area is checked to see if it contain i 
rt checksum. Also, bytes 6 and 103 (addresses 17765022 and 165814," 
ss Amami ae 49 “3 oathet > see if they contain 0 and 252 octal, 
i y. any o ese iti i i 
184 eames ay. Bb y conditions is not met, the following 
| 186 EEPROM checksum error in setup area. 
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SEQ 0005 

187 
189 No attempt is made to correct a checksum error. 
ise 7.5 DIFFERENCES BETWEEN UFD "QUIET" MODE AND “STANDALONE” MODE 
192 When this program is run in UFD "Quiet" mode (which will usually be 
193 the case) none of the error messages will appear. If no error is 
194 detected, no messages whatsoever are printed. If any error is 
195 detected, the program will attempt to restore the UFD and language 
196 ereas to the state they were in when the program was started. If 
197 the restoration was successful, the following message is printed in 
198 the user's language: 
199 
aaa Unable to load <language> 
202 where <language> is the name of the language. If the restoration 
203 was not successful, or there was no local language, the following 
204 message is printed. 
205 
oor Unable to load <language> - reverting to U.S. English 
208 where <language> is as above. The program then clears the bit 
209 in the EEPROM setup area selecting a local language which means 
210 that the ROM English will be used from now on. 
211 
212 8. EXAMPLES S 
213 . 
214 After booting XXDP+ and running the program, no message should 
215 appear, just the XXDP dot prompt ( ) 
216 
217 If a problem occurred, one of the messages in section 7 should appear. 
218 
219 9. PROGRAM DESCRIPTION 
220 
221 The program consists of a body of code which loads the language into 
222 the local language area of the EEPROM. The routine that performs the 
223 write first checks the current value of the byte to be written and if 
224 it is the same, no write is performed. This is done to extend the 
225 life of the EEPROM. The write routine also checks the value in the 
226 EEPROM after the write to insure it was written correctly. After a 
227 succesful run, no message appears, after an unsuccessful attempt to 
228 write any of the bytes in the EEPROM, one of the message in section 7 
229 appears. If run under UFD “Quiet” mode, no message is printed if the 
230 program was successful, otherwise one of the messages in 7.5 appear. 
231 In both cases, the XXDP prompt appears. 
232 
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PROGRAM CONSTANTS 


234 
235 
236 
237 
238 
239 
240 
241 
242 
243 


000000 


177520 
177522 
177522 
165000 
165316 
165006 
166000 
173002 
025370 
000140 
000040 
000002 


000004 


177524 
000015 
000012 
000200 
000100 
000011 
000010 
000040 
000033 


001764 


- SBTTL 
- ENABL 
-NLIST 
-LIST 


BCSR 
PCR 
PCRLB 
E2PROM 
E2PAR 
E2LLB 
ENDE2R 
RMVTST 
DELAY 
LNGHDR 
UF DHDR 
RETRY 


MAXERR 


G1 
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PROGRAM CONSTANTS 
ABS 


MD , CND 
ME 


177520 
177522 
177522 
165000 
E2PROM+316 
E2PROM+6 
E2PROM+1000 
173002 
11000. 

140 

040 

2 


4 
177524 


FLEND-TEXT 





sE2PROM PARITY BYTE 

;LOCAL LANGUAGE BIT IN E2PROM 
sLAST ADDRESS OF E2PROM+-2 

;WORD TO TEST ROM VERSION NUMBER 


;I1.0. OF A LANGUAGE AREA 

:I.0. OF A UFD BLOCK 

sNUMBER OF ATTEMPTS TO WRITE A 
sBYTE IN E2PROM BEFORE GIVING UP 
;NO. OF ERRORS ALLOWED IN LOCAL 
s;LANGUAGE TEXT BEFORE QUITTING 


sSIZE IN BYTES OF TEXT TO BE 
sLOADED INTO EEPROM 


. 


COEEDA EEPROM GER LANG LOR 
CHECK FOR CERTAIN EXCEPTIONS FIRST 


314 001000 
315 001004 
316 001010 


318 001016 
319 001020 
320 001024 
321 001026 


001026 
001032 
322 001034 


324 001036 
325 001042 
326 001044 
327 001050 
328 001052 
329 001056 
330 001060 
331 001062 
332 001064 
333 001066 
334 001072 
335 001074 
336 001102 
337 001104 


001104 

001110 
338 001112 
339 001114 
340 001120 
341 001126 
342 001132 
343 001134 
344 001136 


001136 
001142 
345 001144 


349 001150 
350 001154 
351 001160 
352 001162 
353 001164 
354 001166 


001000 


005037 
013746 
112737 


000007 
020027 
001404 


000001 
000027 
012700 
104003 
000443 


012700 
005001 
012703 
012005 
042705 
060501 
077305 
105701 
001007 
105737 
001004 
123727 
001404 


000001 
000027 
012700 
104003 
000414 
005067 
012737 
023727 
000250 
001405 


000001 
000027 
012700 
104003 
000167 


012700 
012701 
010005 
005003 
111004 
060403 


177522 
177520 
000067 


000005 


002563 


165000 
000151 
177400 


165022 
165314 


002737 


001304 
000016 
173002 


002644 


000636 


165776 
000005 
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177520 


000252 


177522 


.=1000 
START: 


1$: 


201$: 


2028: 


300$: 


99$: 


2s: 


4$: 





SEQ 0007 
.SBTTL CHECK FOR CERTAIN EXCEPTIONS FIRST 
CLR aePCR ;SELECT PAGE 0 OF EEPROM i 
MOV aeBCSR, -(SP) ;SAVE OLD BCSR VALUE 
MOVB #67, 2@BCSR ;WRITE ENABLE THE E2PROM & ENABLE ROM 
MFPT ;GET PROCESSOR TYPE 
CMP RO, #5 ;CHECK TO SEE IF ORION 
BEQ i$ ;YES - CONTINUE 
.TYPMSG #FMSG2 ;FIELD-SERVICE MESSAGE 
.NARG  NARGS 
-.NTYPE NTYPE,#FMSG2 
MOV #FMSG2,RO 
EMT 3 
BR 99$ 
MOV #E2PROM,RO ;STARTING ADDRESS TO CHECKSUM 
CLR Ri sINITIALIZE CHECKSUM 
MOV #105. ,R3 ;NO. OF BYTES TO CKSUM 
MOV CRO)+,R5 ;GET A BYTE 
BIC #177400,R5 ;NO BUS NOISE, THANK YOU. 
ADD RS,R1 sACCUMULATE CHECKSUM 
SOB R3,201$ ;CONTINUE TILL DONE 
TSTB Ri ;I1S CKSUM 0? 
BNE 202$ ;NO, ERROR 
TSTB asE2PROM+22 ;BYTE TO TEST FOR VALID ROM, SHOULD BE 0 
BNE 202$ ;NO, ERROR 
CMPB OVE2PROM+314,8252 / ;BYTE TO TEST FOR VALID ROM 
BEQ 300$ ;GO TO NEXT CHECK IF OK 
. TYPMSG #FMSG4 ;FIELD SERVICE MESSAGE 
.NARG  NARGS 
.NTYPE NTYPE,#FMSG4 
MOV #FMSG4,RO 
EMT 3 
BR 99$ ;QUIT 
CLR OLDSIZ ;SET FLAG THAT ROM EXISTS, CURRENTLY NO LANGUAGE 
MOV #7*2,30PCR ;SEL. LAST PAGE OF 2k E2PROM, PGO OF ROM 
ae Q*RMVTST,(PC)+ ;SEE IF ROM VER. 7 OR LATER (CAN SUPPORT LANGUAGE AREA) 
BEG 2s YES - CONTINUE 
.TYPMSG #FMSG3 
.NARG  NARGS 
.NTYPE NTYPE,#FMSG3 
MOV #FMSG3,RO 
EMT 3 
JMP QUIT1 
-SBTTL SAVE OLD LANGUAGE/UFD AREA IN CASE IT MUST BE RESTORED 
MOV #ENDE2R-2,RO ;LAST ADDRESS (CKSUM) OF E2PROM 
MOV #5,R1 ;NO. OF BYTES IN HEADER TO CHECKSUM 
MOV RO,RS ;SAVE ADDRESS 
CLR R3 Fy 
MOVB (RO),R4 ;GET A BYTE 
ADD R4,R3 ;ACCUMULATE CHECKSUM 


A 


| 
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SAVE OLD LANGUAGE/UFD AREA IN CASE IT MUST BE RESTORED 


355 001170 
356 001172 
357 001174 
358 001176 


376 001250 
377 001254 


005740 
077104 
105703 
001131 


014504 
014546 
110466 
042704 
012601 
042701 
062701 
120427 
v01013 
010104 
12702 
004767 
001105 


010167 
010167 
000500 


120427 
001075 
010167 
062701 
004767 
005003 
004767 
004767 
004767 
010546 
004767 
110566 
004767 
116600 
012601 
105703 
001025 


042700 
120027 
001020 


042701 
062701 
010104 
010167 
066701 
012702 
004767 
001404 


000001 
177437 


160000 
000005 
000040 


005121 
000666 


001150 
001146 


000140 


001130 
000005 
001036 


001002 
000776 
000772 


000764 
000001 
000754 
000001 


177437 
000040 


160000 
000005 


001024 
001016 
005121 
000516 


TST 
SOB 
TSTB 
BNE 


LANG: CMPB 





MACRO YOS.02 Saturday 16-Feb-85 13:55 


-C(RO) 

R1,4$ 

R3 

WRL ANG 


-C(R5),R4 


-(RS),-CSP) 


R4,1(SP) 

#177437,R4 

(SP)+,R1 

#160000,R1 
Ri 


#s, 

R4, #UFDHDR 
LANG 

R1,R4 
#BUFF ,R2 


MOVROM 
WRL ANG 


R1,OLOSIZ 
R1,UFDSIZ 
WRL ANG 


R4,#LNGHDR 
WRL ANG 
R1,OLDSIZ 
#5,R1 
ROMADR 

R3 


REAROM 
REAROM 
REAROM 
RS,-CSP) 
REAROM 
RS,1(0SP) 
REAROM 
1(SP),RO 
(SP)+,R1 
R3 


i$ 
#177437 ,RO 


RO, #UFDHDR 
i$ 
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SEQ 0008 


sCORRECT ADDRESS 

;LOOP FOR 5 BYTES 

;IF NOT ZERO, NO LANGUAGE LOADED 
sNON-EXISTANT OR CORRUPTED LANGUAGE - SKIP 


sHIGH BYTE OF BYTE COUNT 

;LOW BYTE OF BYTE COUNT 

;SET UPPER BYTES OF SIZE 

sEXTRACT ID CODE 

sGET SIZE BACK 

sR1 NOW CONTAINS SIZE OF BLOCK IN BYTES 

sADD BYTE COUNT FOR HEADER BLOCK 

;SEE IF IT IS A UFD BLOCK 

sNO, CHECK FOR A LANGUAGE 

sSAVE SIZE 

sADDRESS OF SAVE BUFFER 

sMOVE UFD AREA TO MEMORY 

sBAD CKSUM, QUIT 

sNOTE - R3 CONTAINS CHECKSUM OF BLOCK AND HEADER 
; HOWEVER THE CHECKSUM OF HEADER IS ALREADY KNOWN 
TO BE O SO R3 IS A VALID CHECK OF UFD BLOCK 
sSAVE TOTAL SIZE 

sSAVE SIZE OF UFD AREA 


sIS THIS A LANGUAGE HEADER? 

sNO - QUIT 

sSAVE SIZE FOR NOW 

sADD SIZE OF (POSSIBLE) UFD HEADER 
;SET UP PCR AND RO 

sINITIALIZE CKSUM 

;GET A BYTE 

sGET A BYTE 

;GET A BYTE 

sSAVE LOW BYTE OF SIZE FOR LATER 
sGET A BYTE 

s;SAVE HIGH BYTE OF SIZE AND ID 
sGET A BYTE 

;GET I.D. 

sGET SIZE 

sSEE IF VALID CKSUM 

sNO - WE HAVE LANGUAGE ONLY. 


;GET ID ONLY 
sIS THIS A UFD BLOCK? 
sNO, IGNORE IT. 


LANGUAGE AREA AND A UFD BLOCK. SAVE THE UFD BLOCK. 


#160000,R1 
R1,R4 

Ri, UFDSIZ 
OLOSIZ,R1 
#BUFF ,R2 
MOVROM 

es 





;GET RID OF ID 

sSIZE OF HEADER 

sBYTE COUNT TO MOVE 

sSAVE UFD SIZE 

sADD SIZE OF LANGUAGE AREA 
sMEMORY ADDRESS TO SAVE TO 
sSAVE UFD AREA 

sYES, IT IS VALID, CONTINUE 





me ee et 


COEEDA EEPROM GER LANG LOR 


MACRO YOS.02 Saturday 16-Feb-85 13:55 Page 6-2 | 


SEQ 0009 
SAVE OLD LANGUAGE/UFD AREA IN CASE IT MUST BE RESTORED 
412 001420 005067 001002 CLR UFDSIZ ;NO UFD AREA 
413 001424 012702 005121 1$: MOV #BUFF ,R2 sRESET R2 
414 001430 016701 000770 2s: MOV OLDSIZ,R1 sSIZE OF LANGUAGE AREA 
415 001434 010104 MOV R1i,R4 sBYTES TO MOVE 
416 001436 066767 000764 000760 ADD UFDSIZ,OLDSIZ ;OLOSIZ IS THE TOTAL SIZE 
417 001444 004767 000464 CALL MOVROM ;SAVE LANGUAGE AREA 
418 001450 001404 BEQ WRL ANG ;LANGUAGE IS GOOD 
419 001452 005067 000746 CLR OLDSIZ 3NO LANGUAGE 
ane 001456 005067 000744 CLR UFDSIZ ;NO UFD AREA 
1 
rr | ;GENERATE CHECKSUM FOR FOREIGN LANGUAGE TEST FILE & WRITE TO THE MEMORY IMAGE 
424 001462 012700 003135 WRLANG: MOV #TEXT,RO sADDRESS OF BEGINNING OF TEXT 
425 001466 005001 CLR Ri ;INIT CHECKSUM 
426 001470 112002 25$: MOVB CRO)+,R2 sREAD A BYTE 
427 001472 160201 SUB R2,R1 sACCUMULATE CHECKSUM 
428 001474 020027 005113 CMP RO, #CKSUM sFINISHED ALL TEXT ? 
429 001500 001373 BNE 25$ 3NO-CONTINUE 
ny 001502 110110 MOVB Ri, (RO) sWRITE THE CHECKSUM 
rt x} .SBTTL LOAD LOCAL LANGUAGE INTO E2PROM 
aa ;WRITE UFD & LOCAL LANGUAGE BLOCKS 
4 
436 001504 016701 000716 MOV UFDSIZ,R1 ;GET THE LENGTH OF THE UFD 
437 001510 062701 001764 ADD #ROMSZ,R1 3... & THE TEXT AREA 
438 001514 004767 000622 JSR PC,ROMADR ;COMPUTE E2PROM PAGE AND ADDR 
439 001520 016701 000702 MOV UFDSIZ,R1 ;SIZE OF UFD AREA TO SAVE 
440 001524 001406 BEQ 40$ ;NO UFD AREA - SKIP 
441 001526 012702 005/21 MOV #BUFF ,R2 sADDRESS OF BEGINNING OF UFD AREA 
442 001532 112205 35$: MOVB CR2)+,R5 sGET SOME DATA 
443 001534 004767 000126 CALL E2wRIT ;GO WRITE IT 
444 001540 077104 SOB R1,35$ sFINISHED UFD? 
445 ;YES-DO LANGUAGE 
446 001542 012702 003135 40$: MOV #TEXT,R2 sADDRESS OF EEPROM LANGUAGE TEXT 
447 001546 012701 001764 MOV #ROMSZ,R1 sBYTES TO MOVE 
448 001552 112205 50$: MOVB (R2)+,R5 ;GET SOME DATA 
449 001554 004767 000106 CALL E2WRIT sWRITE A BYTE 
450 001560 077104 SOB R1,50$ s;ARE WE DONE? 
451 sYES - EXIT 
4S2 001562 112705 000200 MOVB #BIT7,R5 ;TURN ON LOCAL LANGUAGE BIT IN 
453 sSETUP AREA, THEN EXIT 
454 
455 001566 105037 177522 EXIT: CLRB a#PCRLB ;SELECT PAGE 0 
456 001572 012700 165006 MOV #E2LLB,RO sE2PROM WORD CONTAINING LOCAL LANG. BIT 
457 001576 111001 MOVB (RO),R1 
458 001600 142701 177577 BICB #tCBIT7,R1 ;GET CURRENT LOCAL LANGUAGE BIT 
459 001604 120501 CMPB RS,R1 sSEE IF BIT ALREADY CORRECT 
460 001606 001415 BEQ EXIT1 ;YES, JUST RETURN 
461 001610 112701 000200 MOVB #BIT7,R1 ;LOCAL LANGUAGE BIT 
462 001614 111005 MOVB CRO),RS ;GET OLD WORD AGAIN 
463 001616 074105 XOR R1,R5 sFLIP THE BIT 
464 001620 004767 000336 CALL WRBYTE ;CHANGE LOCAL LANGUAGE BIT IN E2PROM 
465 001624 001006 BNE EXIT1 ;WOULD NOT WRITE, JUST GIVE UP 
466 001526 012700 165316 MOV #E2PAR ,RO sADDRESS OF CKSUM BYTE 
467 001632 111005 MOVB CRO),RS ;GET OLD CKSUM BYTE 
468 001634 074105 XOR R1,R5 ;CORRECT THE CKSUM 
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469 
470 
471 


001636 
001642 


001642 
001646 
001650 
001654 
001660 
001664 


001666 
001672 
001674 


001700 
001706 


001710 
001714 


001716 
001722 


001724 
001730 


001732 
001736 


001740 
001742 
001746 
001750 
001752 


001756 
001762 
001766 
001770 
001774 
002002 


002004 
002006 
002014 
002016 


002016 
002022 
002024 
002030 


002032 
002034 


004767 000320 


000001 
000027 
012700 
104044 
142716 
012637 
005037 
000207 


004767 
001431 
005267 


026727 
003036 


020227 
101433 


020227 
101030 


132705 
001425 


132710 
001422 


111004 
116703 
060503 
160403 
110367 


062700 
020027 
001005 
012700 
062737 
000207 


005726 
032737 
001403 


000001 
000027 
012700 
104044 
016701 
100704 


001427 
004767 


002560 


000060 
177520 
177522 


000270 
000522 
000516 


003232 
005112 
000140 


000140 


003145 


003135 


000002 
166000 


165000 
000002 


0001.00 


003006 
000374 


000302 


| 

LOAD LOCAL LANGUAGE INTO E2PROM 
| 
! 
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000004 


177522 


000052 


EXIT1: 


EQWRIT: 


3$: 


10$: 


QUIT: 
QUIT1: 


5$: 


CALL 
.-FRCTYP 


WRBYTE 


#@CRLF 

NARGS 
NTYPE , #CRLF 
#CRLF ,RO 

44 

#60, (SP) 

(SP )+,a#BCSR 
aePCR 

PC 


WRBYTE 
3$ 
WERR 


WERR, #MAXERR 
QUIT 


R2,#M001 
QUIT 


R2, #MEND1 
QUIT 


#140,R5 
QUIT 


#140, (RO) 
QUIT 


CRO),R4 
CKSUM,R3 
R5,R3 
R4,R3 
R3,CKSUM 


#2,RO 
RO, #ENDE2R 
10$ 


#E2PROM,RO 
#2 ,3PCR 


CSP )+ 
#BIT6, #52 
5$ 


#MSGOOO 

NARGS 
NTYPE , @MSGOO0O 
#MSGO00 ,RO 


aa 
OLOSIZ,R1 
EXIT1 


40$ 
PC,ROMADR 
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;UPDATE E2ROM 
;COMPLETE LINE 


;BE SURE ROM IS DISABLED 
sRESTORE BCSR 


;WRITE THE BYTE TO E2PROM 
;OK THIS TIME 
sFLAG BAD BYTE 


;CHECK TO SEE IF PAST THE MAXIMUM ERROR 
;LIMIT OF BAD BYTES ALLOWED 


;CHECK TO SEE IF ERROR IS IN MESSAGE 
;BYTE COUNT (MUST BE CORRECT) 


;CHECK TO BE SURE DICTIONARY AND UFD 
;BLOCKS ARE NOT CORRUPTED 


;CHECK TO SEE IF IT SHOULD BE A CONTROL 
;CODE (POSSIBLY DICTIONARY ENTRY) 


s;IF CONTROL CODE (DICTIONARY REFERENCE 
sPERHAPS) CALL IT QUITS 


;WE WILL LIVE WITH THIS ERROR, CORRECT 
THE CHECKSUM TO ACCOUNT FOR NEW VALUE 
sCANCEL OUT WHAT WAS SUPPOSED TO BE 
;CORRECT FOR ERRONEOUS VALUE 

;PUT BACK CORRECTED VALUE 


s INCREMENT LOCATION 
sFINISHED THIS PAGE ? 
sNO-RETURN 

;YES-RESET ADDRESS 
sINCREMENT PCR TO NEXT PAGE 


s;CORRECT STACK 
;SEE IF UFD QUIET 


3;NO 
sMESSAGE FOR USER IN HIS OWN LANGUAGE 


sERROR WAS NOT ORION OR CKSUM ERROR, DO NOT 
;TRY TO CLEAR LANGUAGE BIT 

;IF NO OLD LANGUAGE TO RESTORE 

s;COMPUTE STARTING ADDRESS OF OLD LANG IN E2PROM 





, 


SEQ 0010 


ee ee ee 


COEEDA EEPROM GER LANG LOR 


LOAD LOCAL LANGUAGE INTO E2PROM 








Li 
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; =. 


Page 6-4 
SEQ 0011‘! 


5i8 002040 012702 005121 MOV #BUFF ,R2 sSTARTING ADDRESS OF OLD LANGUAGE TEXT 
S19 002044 112205 10$: MOVB (R2)+,RS sGET A BYTE 
S20 002046 004767 000110 CALL WRBYTE sWRITE IT OUT 
S21 002052 001017 BNE 40$ sIF ERROR, GIVE UP 
S22 002054 062700 000002 ADD #2,RO s INCREMENT LOCATION 
S23 002060 020027 166000 CMP RO, #ENDEQR sFINISHED THIS PAGE ? 
524 002064 001005 BNE 20$ ;NO-CONTINUE 
S25 002066 012700 165000 MOV #E2PROM,RO ;YES-RESET ADDRESS 
S26 002072 062737 000002 177522 ADD #2,90PCR s INCREMENT PCR TO NEXT PAGE 
S27 002100 077117 20$: 508 R1,10$ ;LOOP UNTIL DONE 
528 002102 026767 000320 000314 CMP UFDSIZ,OLDSIZ  ;IF THE SAME THEN NO LANGUAGE 
529 002110 001254 BNE EXIT1 sIF LANGUAGE, LEAVE F2PROM LANG. BIT AS IT WAS 
530 002112 005005 40$: CLR RS s;TURN OFF LOCAL LANGUAGE BIT IN E2PROM 
531 002114 036737 175760 900052 BIT BIT6,a#S2 sSEE IF UFD QUIET 
532 002122 001621 BEQ EXIT 3NO 
533 002124 -FRCTYP #MSGOO1 
000001 NARG NARGS 
000027 NTYPE NTYPE,#MSGOO1 

002124 012700 003070 MOV #MSGO01,RO 

002130 104044 EMT 44 
css 002132 000615 BR EXIT sAND CALL IT A DAY 
a4 -SBTTL PROGRAM SUBROUTINES 
538 sMOVROM - MOVE BYTES FROM EEPROM TO MEMORY 
539 sENTRY- R1 = STARTING ADDRESS IN EEPROM (# OF BYTES FROM END) 
540 ; R2 = ADDRESS OF MEMORY BUFFER 
541 ; R4 = # OF BYTES TO MOVE 
542 sEXIT Ri - UNCHANGED 
543 ; R2 - UPDATED MEMORY ADDRESS 
544 ; R3 = (BYTE) O IF VALID CKSUM 
545 ; "Z" FLAG SET IF CKSUM VALID 
546 : 
547 002134 010403 MOVROM: MOV R4,R3 sSAVE R4 
548 002156 004767 000200 CALL ROMADR sLOAD PCR AND RO WITH LANGUAGE START AREA 
549 002142 010304 MOV R3,R4 sRESTORE BYTE COUNT 
350 002144 005003 CLR R3 sINIT CHECKSUM 
551 002146 004767 000142 S$: CALL REAROM sGET A BYTE 
SS2 002152 110522 MOVB RS,(R2)+ sSAVE IT 
553 002154 077404 SOB R4,5$ s;LOOP TILL DONE 
554 002156 105703 TSTB R3 313 CHECKSUM GOOD? 
= 002160 000207 RETURN 
557 002162 120510 WRBYTE: CMPB RS,CRO) sIS THE NEW DATA DIFFERENT ? 
a4 002164 001452 BEQ 10$ sNO-DO NOT WRITE OVER 
560 002166 012703 000002 MOV MRETRY ,R3 
561 002172 010510 1$: MOV RS, CRO) sWRITE A LOCATION 
562 902174 012704 025370 MOV @DELAY ,R4 311 MS WAIT 
563 002200 077401 SOB R4,. sWASTE TIME 
564 002202 120510 CMPB RS, CRO) sSEE IF IT TOOK 
565 002204 001442 BEQ 10$ sYES, ALL OKAY 
566 002206 077307 SOB R3,1$ ;IF AT FIRST YOU DON'T SUCCEED... 
567 002210 113704 177522 MOVB @ePCRLB,R4 sPCR PAGE OF BAD BYTE 
568 002214 106204 ASRB R4 sCONVERT TO PAGE @ 
569 002216 062704 000060 ADD #'O,R4 sCONVERT TO OCTAL 

002222 110467 000237 MOVB R4,FMSG14 sSTORE IT FOR PRINTING 


uw 
at 
°o 


f 
| 
| 

COEEDA EEPROM GER LANG 


PROGRAM SUBROUTINES 


$71 002226 010046 
572 002230 


573 002236 


574 002244 042705 
575 002250 


002252 012701 
002256 104030 
S76 002260 


002260 012700 

002264 104003 
577 002266 013600 
578 002270 042700 
$79 °02274 


002274 012701 
002300 104030 
580 002302 


582 002312 000207 


594 002314 012005 
595 002316 060503 
596 002320 020027 
597 002324 001005 
598 002326 012700 
599 002332 062737 
600 002340 000207 


= —- 





LOR 


002500 


002430 
177400 


002526 


002531 


177400 


002551 


002554 


166000 


165000 
000002 
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SEQ 0012 

MOV RO, -(SP) ;SAVE ROM ADDRESS 
-ITOA ,@FMSG1B sCONVERT ROM ADDRESS TO OCTAL 
-NARG _NARGS 

-NTYPE NTYPE , @FMSG1B 

MOV #FMSG1B,R1 

EMT 30 
.TYPMSG #FMSG1 ; ;PRINT OUT FIRST PART OF MESSAGE 
-NARG NARGS 


-NTYPE NTYPE,@FMSG1 
MOV #FMSG1,RO 


ent 63 
BIC #177400,R5 sMAKE SURE RS IS POSITIVE AND A BYTE 
-ITOA RS, #DUMMY1 sCONVERT TO OCTAL 
-NARG _NARGS 

»NTYPE NTYPE ,RS 

MOV R 


5,RO0 

-NTYPE NTYPE , @DUMMY1 

MOV #DUMMY1,R1 

EMT 30 
.TYPMSG #FMSG1C sPRINT OUT LAST 3 DIGITS OF NUMBER & MESSAGE 
-NARG NARGS 
-NTYPE NTYPE,@FMSG1C : 

MOV #FMSGiC,RO 


EMT 3 
MOV @CSP)+,RO ;GET BYTE AT ROM ADDRESS 
BIC #177400 ,RO ;GET RIO OF BUS NOISE 
-ITOA = ,@DUMMY2 sCONVERT TO OCTAL 

NARG NARGS 

-NTYPE NTYPE , @DUMMY2 

MOV #DUMMY2,R1 

EMT 30 
-TYPMSG #FMSG1D sPRINT LOWER 3 BYTES & REST OF MESSAGE 
-NARG NARGS 


-NTYPE NTYPE,#FMSG1D 
MOV #FMSG1D,RO 
Ent 3 
CLZ sCOULDN'T DO IT, SET ERROR FLAG 
10$: RETURP 


sREAROM - READS A BYTE FROM E2PROM ADDRESS (RO)+ INTO RS. AUTOMATICLY ADJUSTS 
;PCRLB. UPDATES CKSUM IN R3 
; ENTRY - RO ADORESS IN ROM TO READ FROM 
R3 PARTIAL CKSUM 
PCRLB CORRECT VALUE FOR BYTE TO READ 


H 

‘ 

: EXIT RO ADDRESS OF NEXT BYTE 

; R3 UPDATED CKSUM 

; RS BYTE READ 

; PCRLB <>°RECT VALUE FOR NEXT BYTE 

REAROM: MOV (RO)+,RS ;GET A BYTE & UPDATE ADDR. BY 2 
ADD R5S,R3 ;UPDATE CKSUM 
CMP RO, @ENDE2R ;SEE IF WE SHOULD SWITCH PAGES 
BNE 10$ ;NO 
MOV #E2PROM,RO ;YES - GO TO START OF PAGE 

177522 ADD #2, 20PCR ;ADVANCE A PAGE 
10$: | RETURN 


—— _— _—_—rlliiiccnandaemndann 


[' 


’ 
| 





COEEDA EEPROM GER LANG LOR 


PROGRAM SUBROUTINES 


609 002342 010100 
610 002344 010105 
611 002346 072527 
612 002352 012704 
613 002356 160504 


615 002360 042700 
616 002364 006300 
617 002366 001003 
618 002370 012700 
619 002374 000406 


621 002376 005400 
622 002400 042700 
623 002404 052700 
624 002410 005304 
626 002412 006304 
627 002414 110437 
628 002420 000207 

000000 
631 002424 177777 


633 002426 000000 


639 002465 130 


640 002500 
641 002506 01s 
002511 141 


177770 
000010 


177400 


165000 


177000 
165000 


177S22 





Ni 
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sROMADR - CALCULATE PAGE OFFSET 


; ENTRY - R1 SIZE IN 
5 EXIT - RO INITIAL 
; Ri SIZE IN 
: PCRLB CORRECT 
ROMADR: MOV R1,RO 

MOV R1,R5 

ASH @-8.,R5 

MOV 07+1,R4 

SUB RS,R4 

BIC #177400,RO 

ASL RO 

BNE 20$ 

MOV #E2PROM, rO 

BR 30$ 
20%: NEG RO 

BIC #177000 ,RO 

BIS #E2PROM,RO 

DEC R4 
30$: ASL R4 

1 .JVB R4,a0PCRLB 

RTS PC 
WERR: 0 
OLDSIZ: -1 
UFDSIZ: 0 


Page 6-6 


vies OF ROM GIVEN SIZE IN BYTES 
ADDRESS FOR FIRST BYTE IN ROM 
BYTES 

VALUE FOR FIRST BYTE IN ROM 


;COPY BYTE COUNT 

sSECOND COPY 

sDIVIDE BYTE COUNT BY 256. BYTE PAGES 
;LAST PAGE IN 2 K PART + 1 

sSTARTING PAGE NUMBER 


;LEAVE ONLY BITS 7:0 
;DOUBLE VALUE 


H 
:IF O 
;MAKE STARTING ADDRESS BITS 8:0 


é 
;MAKE A E2PROM ADDRESS 
sDECREMENT PAGE NUMBER BY 1 


;MAKE PAGE NUMBER CORRECT FOR PCR 
sCORRECT PAGF IN PCRLB 
RETURN 


sFLAG FOR BAD BYTE 

320 - SIZE IN BYTES OF OLD LANCUAC ., 0 IF NO 
sLANGUAGE, -1 IF E2PROM MAY BE BAD/NONEXISTANT 
sSIZE IN BYTES OF OLD UFD AREA 


-SBTTL “FIELD SERViCE MODE” ERROR MESSAGES 


-ENABL LC 


FMSGi: .ASCII /EEPROM write error, PCR page / 


FMSG1A: .ASCII /X, address / 


FMSG1B: .BLKB 


6 
-ASCIZ <CR><LF>/Date wr 


:FOR ADDRESS 
itten / 


COEEDA EEPROM GER LANG LOR MACRO YOS.02 Seturday 
"FIELD SERVICE MODE” ERROR MESSAGES 
642 002526 DUMMY1: .BLKB 
643 002531 FMSGiC: .BLKB 
644 002534 0S4 040 104 -ASCIZ 
002537 141 164 141 
002542 040 162 145 
002545 141 144 040 
002550 000 
64S 002551 DUMMY2: .BLKB 
646 002554 FMSG1D: .BLKB 
647 002557 056 -ASCII 
648 002560 015 012 000 CRLF: .ASCIZ 
649 002563 114 141 156 FMSG2: .ASCIZ 
002566 147 165 141 
002571 147 145 040 
002574 101 162 145 
002577 141 040 156 
002602 157 164 040 
002605 163 165 160 
002610 160 157 162 
002613 164 145 144 
002616 040 i37 156 
002621 040 164 150 
002624 151 163 040 
002627 160 162 157 
002632 143 145 163 
002635 163 i157 162 
002640 056 01S 012 
002643 000 
650 002644 103 165 162 FMSG3: .ASCIZ 
002647 162 145 156 
002652 164 040 142 
002655 157 157 164 
002660 040 122 117 
002663 115 040 166 
002666 145 162 163 
002671 151 157 156 
002674 040 144 157 
002677 145 163 040 
002702 156 157 164 
002705 040 163 165 
002710 160 160 157 
002713 162 164 040 
002716 154 141 156 
002721 147 165 141 
002724 147 145 040 
002727 141 162 145 
002732 141 056 015 
002735 012 000 
651 002737 103 150 145 FMSG4: .ASCIZ 
002742 143 153 163 
002745 165 155 040 
002750 145 162 162 
002753 157 162 040 
002756 151 156 040 
002761 105 105 120 
002764 122 117 115 
| 
' 





ES A 





Be 
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SEQ 0014 


; 33 UPPER BYTES NOT TO BE PRINTED 
/, Date read / 

; 33 UPPER BYTES NOT TO BE PRINTED 
4./ 

<CR><LF> 


/Language Area not supported on this processor ./<CR><LF> 


/Current boot ROM version does not support language area./<CR><LF> 


/Checksum error in EEPROM setup area./<CR><LF> 


COEEDA EEPROM GER LANG LOR 


A 


"FIELD SERVICE MODE” ERROR MESSAGES 


652 
. 653 


654 








Ce 
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-SBTTL TRANSLATED LOADER ERROR MESSAGES 


-ASCIZ 


-ASCIZ 


<CR>!Deutsche Meldungen koennen nicht geleden werden. ! 


! - Zurueck zu englischen Meldungen. !<CR> 


-SBTTL START OF AREA TO BE LOADED INTO E2PROM 
-SBTTL Deutsch LANGUAGE TEXT 


002772 164 165 160 
002775 040 141 162 
003000 145 141 056 
003003 01s 012 000 
003006 015 104 145 MSGOOO: 
003011 165 164 163 
003014 143 150 145 
003017 040 115 145 
003022 154 144 165 
003025 156 147 145 
003030 156 040 153 
003033 157 145 156 
003036 156 145 156 
003041 040 156 151 
003044 143 150 164 
003047 040 147 145 
003052 154 141 144 
003055 145 156 040 
003060 167 145 162 
003063 144 145 156 
003066 056 000 

003070 040 055 040 MSGOO1: 
003073 132 165 162 
003076 165 145 143 
003101 153 040 172 
003104 165 040 145 
003107 156 147 154 
003112 151 163 143 
003115 150 145 156 
003120 040 115 145 
003123 154 144 165 
003126 156 147 145 
003131 156 056 015 
003134 000 

003135 o7S TEXT: 


-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 


MOO1-TEXT 
MO002-M001 
MO003-M002 
M004 -M003 
MOOS -M004 
M006 -MOOS 
M007 -M006 
M010-M007 
MO11-M010 
MO12-M011 
MO13-M012 
MO014-M013 
MO1S-M014 
MO16-M015 
MO17-M016 
MO020-M017 
M021 -M020 
MO022-M021 








SEQ 0015 


COEEDA EEPROM GER LANG LOR 


Deutsch 


~ 
' 
o 


a el 


LANGUAGE TEXT 


003157 
003160 
003161 
003162 
003163 
003164 
003165 
003166 
003167 
003170 
003171 
003172 
003173 
003174 
003175 
003176 
003177 


003271 
003273 


165 
143 


114 
000 
114 
105 


123 
116 


-BYTE 
-BYTE 
-BYTE 
BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTF 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-BYTE 
-ASCIZ 


-ASCIZ 
-ASCIZ 
-ASCIZ 
-ASCIZ 


-ASCIZ 
-ASCIZ 





MACRO YOS.02 Seturday 16-Feb-85 13:55 Page 6-9 


M023-M022 
M024-M023 
M025-M024 
M026-M025 
M027 -M026 
MO30-M027 
MO31-M030 
M032-M031 
MO33-M032 
M034 -11033 
MO35-M034 
MO36-M035 
M037-M036 
M040-M037 
M04) -M040 
M042-M041 
M043-M042 
M044-M043 
M045 -M044 
M046-M045 
M047-M046 
MOS0O-M047 
MOS1-M0SO 
MO52-M051 
MO53-M0S2 
MO0S4-M053 
MOSS-M05S4 
MOS56-M055 
MO057-M056 
MO060-M057 
M061-M060 
M062-M061 
M063-M062 
M064 -M063 
M065 -M064 
M066 -M065 
M067 -M066 
MO70-M067 
MO71-M070 
MO72-M071 
MO73-M072 
MO74-M073 
MEND1-M074 
!Deutsch! 


eT? 
!HILFE! 
!URLADEN! 


‘LISTEN! 








;Setup command 
;Map command 


—--——— 


SEQ 0016 


— — 
| 


COEEDA EEPROM GER LANG LDR 


Deutsch LANGUAGE TEXT 


727 003275 


736 003347 


737 003377 


738 003417 


739 003500 


177 


ee ee ee 


000 


145 
145 
156 
145 
145 
145 
156 
155 
156 
145 
150 
151 
156 


141 
160 
147 
155 
040 
146 
163 
156 
171 
145 
164 
164 
157 


113 
155 
144 
040 
163 
162 
142 
147 
125 
101 
116 
040 
163 
155 
157 
107 


145 
154 
145 
165 





MACRO YOS.02 


MO10: 
MO11: 
MOle: 
MO13: 
M014: 
MOi5: 
MO16: 
MO17: 
162 M020: 


144 M021: 


163 M022: 


157 M023: 


ce 
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-ASCIZ <177> ;Test command 


-ASCII !Geraetename Geraetenummern Beschreibung! <CR> 


-ASCII !Ladeprogramme auflisten!<CR> 


-ASCII !Systemstart von ! 


-ASCII <CR>!Kommando Beschreibung! <CR><CR>!URLADEN 


-ASCII !aet laden und starten!<CR>!LISTEN ! 





System von Ger! 





SEQ 0017 





| 
| FO 
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SEQ 0018 
Deutsch LANGUAGE TEXT 
003514 144 040 163 
003517 164 141 162 
003522 164 145 156 
003525 ois 114 111 
003530 123 124 105 
003533 116 040 040 
003536 040 040 
740 003540 015 114 141 M024: -ASCII <CR>!Ladeversuch mit ! 
003543 144 145 166 
003546 145 162 163 
003551 165 143 150 
003554 040 155 151 
003557 164 040 
741 003561 057 M025: ~.AOCIT ‘yy? 
742 003562 104 162 165 M026: -ASCII !Druecken Sie die Wagenruecklauftaste: ! 
003565 145 143 153 
003570 145 156 040 
003573 123 151 145 
003576 040 144 151 
003601 145 040 127 
003604 141 147 145 
003607 156 162 165 
003612 145 143 153 
003615 154 141 165 
003620 146 164 141 
003623 163 164 145 
003626 072 040 
743 003630 106 145 150 M027: -ASCII !Fehler ! 
003633 154 145 162 
003636 040 
744 003637 040 101 144 M030: -ASCII ! Adresse ! 
003642 162 145 163 
003645 163 145 040 
745 003650 124 145 163 M031: -ASCII !Test laeuft! 
003653 164 040 154 
003656 141 145 165 
003661 146 164 
746 003663 060 055 MO32: -ASCII /0-/ 
747 003665 015 107 145 M033: -ASCII <CR>!Geben Sie ein Kommando ein und druecken Sie <WR>: ! 
003670 142 145 156 
003673 040 123 151 
003676 145 040 145 
003701 151 156 040 
003704 113 157 155 
003707 155 141 156 
003712 144 157 040 
003715 145 i51 156 
003720 040 165 156 
003723 144 040 144 
003726 162 165 145 
003731 143 153 145 
003734 156 040 123 
003737 151 145 040 
003742 074 127 122 
003745 076 072 040 
748 003750 M034; 


j 749 003750 011 MO3S: -BYTE TAB 
' 


COEEDA EEPROM GER LANG LOR 


Deutsch LANGUAGE TEXT 


750 
751 
752 


753 
754 


755 


756 


757 


758 


003751 
003751 
003753 





MO36: 
M037: 
M040: 


M041: 
M042: 


M043: 


M044: 


M045: 


M046: 


MACRO YOS.02 Saturday 


-BYTE 
-ASCII 


- ASCII 


- ASCII 


-ASCII 


-ASCII 


- ASCII 


Ge 
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CR, SPACE 
'ROM-Urladung wird gestartet! 


<CR>!Meldung 06!<CR> 


'Laufwerk nicht betriebsbereit! 


!Datentraeger kann nicht geladen werden! 


!Keine Platte/Diskette eingelegt! 


!Kein Band eingelegt! 


ES A ES 


SEQ 0019 


| COEEDA EEPROM GER LANG LOR 
Deutsch LANGUAGE TEXT 


759 


761 


762 


763 


764 


765 


766 





004207 
004212 
004215 





145 M047: 


165 M050: 


147 MOS1: 


147 MOSe: 


150 MOS3: 


165 M054: 


125 MOSS: 


151 MOS6: 


NL 


- ASCII 


- ASCII 


- ASCII 


-ASCII 


-ASCII 


-ASCIT 


-ASCITI 


-ASCII 


He | 
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MACRO YOS.02 Saturday 


SEQ 0020 =o! 


!Stevermodul nicht vorhanden! 


'Laufwerk nicht vorhanden! 


!Ungueltige Geraetenummer ! 


!'Ungueltiges Geraet! 


'Fehler im Steuermodul! 


'Laufwerkfehler! 


<CR><CR>!Urladung laeuft ! 


<CR>!Siehe Systemhandbuch, Abschnitt Fehlersuche und -behebun! 


767 
768 


769 


770 
771 


772 
773 


774 


775 
776 


777 


004457 
004462 
004465 
004470 
004473 
004476 
004501 


004712 
004715 





COEEDA EEPROM GER LANG LOR 
Deutsch LANGUAGE TEXT 


054 
142 
150 
164 
106 
154 
163 
150 








Ie 
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062 M057: 
MO60: 
154 M061: 
M062: 
113 M063: 


145 M064: 


010 M065: 
156 M066: 


115 M067: 


-ASCII 
- ASCII 
- ASCII 
-ASCII 


BYTE 
-ASCII 


- ASCII 


-BYTE 
- ASCII 


- ASCII 


SEQ 0021 


'g!<CR><CR> 

<ESC>/[2uU/ ;Erase screen 

<ESC>/(5;0H/ ;Set cursor to line 5 and col 1 
!Meldung ! 


CR,CR 
<CR><CR>/KDJ11-B >/ 


<CR>!Fehler im EEPROM-Urladeprogramm!<CR> 


BACKSP , SPACE ,BACKSP 
<CR>!Ungueltiges Kommando!<CR> 


<CR><CR>!Moegliche Kommandos: HILFE, URLADEN und LISTEN.! 


COEEDA EEPROM GER LANG LOR 





Deutsch LANGUAGE TEXT 


004720 
004723 
004726 
004731 
004734 
004737 
778 004740 
004743 
004746 
779 004750 
780 004753 
004756 
004761 
004764 
004767 
004772 
004775 
005000 
005003 
005006 
005011 
005014 
005017 
005022 
005025 
005030 
005033 
005036 
005041 
005044 
781 005047 
782 005051 
783 005053 
005056 
005061 
005064 
005067 
005072 
005075 
005100 
005103 
005106 
005111 
784 005112 
| 
\ 


786 005112 
787 005112 
788 005113 
791 005113 


793 005113 


796 005114 


101 
116 
156 
114 
124 
056 
101 
145 
145 
040 
107 
145 
123 
040 
162 


001 


000 
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105 
165 
040 
123 
116 





Je 


MO70: -ASCII !Adresse ! 

MO71: -ASCII /=/ 

MO72: -ASCII !Geben Sie Geraetename und -nummmer ein und druecken Sie <WR>! 
sASCIT Ys 3 

MO73: -ASCII <TAB><TAB> 

M074: -ASCII <CR>!Automatische Urladung beginnt!<CR> 

MEND1: 


-SBTTL NULL DICTIONARY BLOCK, CHECKSUM AND LANGUAGE HEADER 


wb: 
ENGWRD: .BYTE ENDBLK -ENGWRD 
ENDBLK : 


WEND : 
CKSUM: .byte 0 ;checksum 


MEND : sEND OF NULL TEXT 


zit 


SEQ 0022 ~=CS! 











ee K2 


| COEEDA EEPROM GER LANG LOR MACRO YOS.02 Saturday 16-Feb-85 13:55 Page 6-16 
SEQ 0023 
NULL DICTIONARY BLOCK, CHECKSUM AND LANGUAGE HEADER 
798 005114 ME : 
799 005114 WE : 
800 
roe sFOREIGN LANGUAGE HEADER 
803 000002 Bi = WE - WBE377 sDICTIONARY BYTE COUNT 7:0 
804 000000 Be . WE -WBE17400/256. sDICTIONARY BYTE COUNT 10:8 
805 000357 B3 ” MEND -text&377 sTEXT BYTE COUNT 7:0 
oo 000143 B4 = MEND -text€017400/256. !140 sTEXT BYTE COUNT 12:8 & ID=011 
808 005114 002 -BYTE 61 
809 005115 000 -BYTE B2 
810 005116 357 -BYTE B63 
811 005117 143 -BYTE B84 
| 005120 254 -BYTE -<B1+B2+B3+B4>€377 sTHIS BYTE IS HEADER CHECKSUM 
814 005121 FLEND: 
815 005121 BUFF : ; TEMPORARY SAVE AREA FOR OLD AREA 
816 001000 -END START 


a A 


COEEDA EEPROM GER LANG LOR 


Symbol teble 
BACKSP= 000010 
BCSR = 177520 
BOR = 177524 
BIT6 = 000100 
BIT7 = 000200 
BUFF 005121 
Bi = 000002 
B2 = 000000 
63 = 000357 
Ba = 000143 
CKSUM 005113 
CR = 000015 
CRLF 002560 
DELAY = 025370 
DUMMY1 002526 
DUMMY2 002551 
ENDBLK 005113 
ENDE2R= 166000 
ENGWRD 005112 
ESC = 000033 
EXIT 001566 
EXIT1 001642 
E2LLB = 165006 
E2PAR = 165316 
E2PROM= 165000 
E2WRIT 001666 
ABS. 005121 
000000 


Errors detected: 


FLEND 
FMSG1 
FMSG1A 
FMSG1B 
FMSG1C 


LNGHDR= 





ere: ee 
MACRO YOS.02 Saturday 16-Feb-85 13:55 Page 6-17 
SEQ 0024 =! 

005121 M010 003275 M042 004006 M074 005053 
002430 MO11 003277 M043 004022 NARGS = 000001 
002465 M012 003277 M044 004057 NTYPE = 000027 
002500 M013 003277 M045 004125 OLOSIZ 002424 
002531 M014 003277 M046 004164 PCR = 177522 
002554 M015 003277 M047 004207 PCRLB = 177522 
002563 M016 003277 MOSO 004242 QUIT 002004 
002644 M017 003277 MOS1 004272 QUIT1 002006 
002737 M020 003277 MOS2 004323 REAROM 002314 
001262 MO21 003347 M053 004345 RETRY = 000002 
000012 M022 003377 M054 004372 RMVTST= 173002 
000140 M023 003417 MOSS 004410 ROMADR 002342 
000004 M024 003540 MOS6 004432 ROMSZ = 001764 
005114 M025 003561 MOS7 004526 SPACE = 000040 
005114 M026 003562 M060 004540 START 001000 
005112 M027 003630 MO61 004540 TAB) = 000011 
002134 M030 003637 M062 004550 TEXT 003135 
003006 MO31 003650 M063 004552 UFDHDR= 000040 
003070 M032 003663 M064 004565 UFDSIZ 002426 
003232 M033 003665 M065 004626 WB 005112 
003242 M034 003750 M066 004631 WE 005114 
003244 MO35 003750 M067 004657 WEND 005113 
003252 MO36 003751 M070 004740 WERR 002422 
003262 M037 003751 MO71 004750 WRBYTE 002162 
003271 M040 003753 MO72 004753 WRLANG 001462 
003273 M041 004006 MO73 005051 


000 = (RW, 1, GBL, ABS, ,OVR) 
001 (CRW,I,LCL,REL,CON) 


0 


*** Assembler statistics 


Work file reads: 


0 


Work file writes: 0 
8558 Words ( 34 Pages) 


Size of 
Size of 


work file: 
core pool: 
Operating system: 


19402 Words 
RSX-11M/PLUS 


Elapsed time: 00:00:26.22 
OEEDAO. BIC, COEEDAO/CR/ -SP=COEEDAO 


( 74 Pages) 
(Under VAX/VMS) 


COEEDAO 


SYMBOL CROSS REFERENCE 


SYMBOL 


BACKSP 
BCSR 





CREATED BY MACRO ON 16-FEB-85 AT 13:55 PAGE 1 


VALUE 


001666 
005121 
002430 
002465 


REFERENCES 


95-260 
#5-239 
95-254 
#5-258 
#5-257 
6-370 
96-803 
96-804 
%6-805 
96 - 806 
6-428 
05-255 
6-736 
6-754 
6-773 
6-471 
05-247 
6-575 
6-579 
6-787 
95-245 
06-787 
05-262 
96-455 
6-460 
5-244 
05-243 
05-242 
6-598 
6-443 
5-264 
6-573 
*6-570 
6-572 
6-576 
6-580 
6-321 
6-344 
6-337 
6-368 
05-256 
05-248 
05-252 
06-798 
96-796 
6-487 
6-371 
6-512 
6-533 
6-484 
6-660 
6-661 


6-775 
6-315 


6-510 
6-452 
6-409 
6-808 
6-809 
6-810 
6-811 
6-497 
6-641 
6-738 
6-765 
6-774 
6-471 
6-562 
6-575 
6-579 
06-788 
6-349 
6-787 
6-768 
6-532 
6-465 
6-456 
6-466 
5-243 
6-618 
6-449 
96-814 
6-573 
6-639 
6-572 
6-576 
6-580 
6-321 
6-344 
6-337 
6-380 
6-641 
6-380 
6-481 


6-805 
6-719 
6-410 
6-512 
6-533 
6-659 
6-661 
6-662 


CREF 


*6-316 *6-473 
6-458 6-461 
6-413 6-441 


*6-500 96-793 
6-648 6-649 
6-738 6-738 
6-765 6-766 
6-774 6-776 


6-503 6-523 


96-471 6-514 


5-244 5-245 


6-648 6-649 


6-417 %6-547 


6-660 #6-720 


vo2 


M2 


6-518 


6-650 
6-739 
6-767 
6-776 


6-596 


6-529 


6-324 


6-650 


#6-815 


6-651 
6-740 
6-767 
6-777 


6-333 


6-651 





6-653 
6-747 
6-772 
6-777 


6-335 


6-654 
6-751 
6-772 
6-783 


6-505 


ee 


| 
SEQ 0025 


6-735 
6-754 
6-773 
6-783 


6-525 


~ - ae ee 


Ne 


COEEDAO CREATED BY MACRO ON 16-FEB-85 AT 13:55 PAGE 2 


SYMBOL CROSS REFERENCE CREF vo2 
SYMBOL VALUE REFERENCES 

M004 003252 6-662 6-663 96-723 
MOOS 003262 6-663 6-664 06-724 
MOO6 003271 6-664 6-665 96-725 
M007 003273 6-665 6-666 6-726 
M010 003275 6-666 6-667 06-727 
MO11 003277 6-667 6-668 06-728 
MO12 003277 6-668 6-669 06-729 
M013 003277 6-669 6-670 6-730 
M014 003277 6-670 6-671 06-731 
mMo15 003277 6-671 6-672 06-732 
M016 003277 6-672 6-673 06-733 
M017 003277 6-673 6-674 06-734 
mo20 003277 6-674 6-675 06-735 
mMo21 003347 6-675 6-676 06-736 
M022 003377 6-676 6-677 06-737 
M023 003417 6-677 6-678 96-738 
M024 003540 6-675 6-679 06-740 
Mo25 003561 6-679 6-680 96-741 
M026 003562 6-680 6-681 96-742 
M027 003630 6-681 6-682 06-743 
M030 003637 6-682 6-683 06-744 
MO31 003650 6-683 6-684 06-745 
MO32 003663 6-684 6-685 06-746 
MO33 003665 6-685 6-686 06-747 
M034 003750 6 656 6-687 06-748 
MO35 003750 6-687 6-688 06-749 
M036 003751 6-688 6-689 06-750 
M037 003751 6-689 6-690 06-751 
M040 003753 6-690 6-691 06-752 
M041 004006 6-691 6-692 06-753 
M042 004006 6-692 6-693 96-754 
M043 004022 6-693 6-694 06-755 
M044 004057 6-694 6-695 06-756 
M045 004125 6-695 6-696 06-757 
M046 004164 6-696 6-697 06-758 
M047 004207 6-6-7 6-698 #6-759 
MOSO 004242 6-698 6-699 06-760 
MOS1 004272 6-699 6-700 06-761 
mMOS2 004323 6-700 6-701 06-762 
MOS3 004345 6-701 6-702 to-763 
MOS4 004372 6-702 6-703 06-764 
MOSS 004410 6-703 6-704 06-765 
MOS6 004432 6-704 6-705 06-766 
MOS7 004526 6-705 6-706 06-768 
M060 004540 6-706 6-707 96-770 
M061 004540 6-707 6-708 06-771 
M062 004550 6-708 6-709 06-772 
M063 004552 6-709 6-710 06-773 
M064 004565 6-710 6-711 06-774 
MOo6S 004626 6-711 6-712 06-775 
M066 004631 6-712 6-713 06-776 





a 





COEEDAO 


SYMBOL CROSS REFERENCE 





B3 


CREATED BY MACRO ON 16-FEB-85 AT 13:55 PAGE 3 


SYMBOL VALUE 

M070 004740 
MO71 004750 
MO72 004753 
M073 005051 
M074 005053 
NARGS 000001 
NTYPE 000027 
OLOSIZ 002424 
PCR 177522 
PCRLB 177522 
QUIT 002004 
QUIT1 002006 
REAROM 002314 
RETRY 000002 
RMVTST 173002 
ROMADR 002342 
ROMSZ 001764 
SPACE 000040 
START 001000 
TAB 000011 
TEXT 003135 
UF 000040 
UFDSIZ 002426 
WB 005112 
WE 005114 
WEND 005113 
WERR 002422 
WRBYTE 002162 
WRL ANG 001462 


SEQ 0027 
CREF vo2 

REFERENCES 

6-714 6-715 06-778 

6-715 6-716 06-779 

6-718 6-719 96-783 

96-321 6-321 06-337 6-337 96-344 6-344 96-471 6-471 96-512 
6-512 $6-533 6-533 96-572 6-572 6-572 96-573 6-573 96-575 
6-575 6-575 06-576 6-576 96-579 6-579 6-579 96-580 6-580 
96-321 6-321 06-337 6-337 96-344 6-344 6-471 6-471 6-512 
6-512 #6-533 6-533 %6-572 6-572 96-573 6-573 96-575 6-575 
96-575 6-575 06-576 6-576 96-579 6-579 96-580 6-580 

ah *6-376 #6-382 6-408 6-414 *6-416 *6-419 6-513 6-528 
@5-240 *6-314 #6-340 *6-474 *6-506 *6-526 *6-599 

@5-241 #6-455 6-567 *6-627 

6-482 6-485 6-488 6-491 6-494 96-509 

6-345 #6-510 

6-386 6-387 6-388 6-390 6-392 6-551 96-594 

#5-250 6-560 

@5-246 6-341 

6-384 6-438 6-517 6-548 %6-609 

95-264 6-437 6-447 

95-261 6-751 6-775 

06-314 6-816 

@5-259 6-749 6-782 6-782 

5-264 6-424 6-446 96-659 6-659 6-805 6-806 

05-249 6-367 6-399 

*6-377 *6-407 *6-412 6-416 *6-420 6-436 6-439 6-528 96-633 
06-786 6-803 6-804 

06-799 6-803 6-804 

6-791 

*6-479 6-481 96-630 

6-464 6-469 6-477 6-520 #6-557 

6-358 6-372 6-378 6-381 6-418 96-424 


6-716 6-717 96-780 
6-717 6-718 96-782 
} 


